10 PRINT CHR$(147)CHR$(14)CHR$(5)
20 PRINT"[193]NLEITUNG FUER [205]ASTERCOPY"
30 PRINT
40 PRINT"[193]USGABE AUF [196]RUCKER ODER [194]ILDSCHIRM ?"
50 PRINT
60 INPUT"[194]ITTE <D> ODER <B> EINGEBEN";A$
70 GA=3
80 IF A$="D" OR A$="[196]" THEN GA=4
90 OPEN1,8,2,"MASTERCOPY,S,R"
100 OPEN2,GA,7
110 GET#1,A$
120 IF ST <> 0 THEN GOTO 150
130 PRINT#2,A$;
140 GOTO 110
150 CLOSE 2
160 CLOSE 1